home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / biz / demo / ArtStudioPro.lha / ArtStudioPro / Install_ArtStudio < prev    next >
Encoding:
Text File  |  1997-10-31  |  12.4 KB  |  670 lines
  1. ; $VER: ArtStudio_Install 2.009 (28.05.96)
  2. ; Script to install ArtStudio Version 2.0
  3.  
  4. (complete 0)
  5. (user 1)
  6.  
  7. ;=============================================================================
  8. ; English strings
  9.  
  10. (set default_lang 4)
  11.  
  12. (set #bad-kick "ArtStudio needs Amiga-OS 3.0 or higher")
  13.  
  14. (set SelectDir1Msg
  15.      (cat "Please select a directory\nto install ArtStudio in"
  16.      )
  17. )
  18.  
  19. (Set ProgMsg
  20.      (cat "Which parts should i install?"
  21.      )
  22. )
  23.  
  24.  (set Choice1Msg "ArtStudio Mainprogram (2MB)")
  25.  (set Choice2Msg "ArtStudio Instruction (2MB)")
  26.  (set Choice3Msg "ArtStudio Tools (2.6KB)")
  27.  (set Choice4Msg "ArtStudio Web Graphics (ca. 1.2MB)")
  28.  (set Choice5Msg "ArtStudio preferences (ca. 35KB")
  29.  
  30.  (set FPU1Msg "None")
  31.  (set FPU2Msg "Yes, this machine is with FPU")
  32.  
  33.  (set CPU1Msg "MC68000")
  34.  (set CPU2Msg "MC68030")
  35.  (set CPU3Msg "MC68040")
  36.  (set CPU4Msg "MC68060")
  37.  (set CPU5Msg "PPC603/604")
  38.  
  39.  (set CPUMsg "What CPU does the machine have that you are installing ArtStudio Pro?")
  40.  
  41.  (set UpDateasyn "Checking and updating asyncio.library, if needed...")
  42.  (set UpDatempeg "Checking and updating cgxmpeg.library, if needed...")
  43.  (set UpDategarb "Checking and updating garbagecollector.library, if needed...")
  44.  (set UpDategraf "Checking and updating graffiti.library, if needed...")
  45.  
  46.  (set InstallArtStudioProg "Installing ArtStudio professional main program...")
  47.  (set InstallLoader "Installing loader...")
  48.  (set InstallSaver "Installing saver...")
  49.  (set InstallOperator "Installing Operator files...")
  50.  (set InstallViewer "Installing viewers...")
  51.  (set InstallARexx "Installing ARexx files...")
  52.  (set InstallGuide "Installing Guide-File...")
  53.  (set InstallCatalog "Installing Catalogs files...")
  54.  (set InstallTools "Installing Tools...")
  55.  (set AssignAdd1
  56.      (cat "\nAdding the ArtStudio assignment to s:user-startup - it currently looks like this:\n\n%s\n\n"
  57.           (cat "assign ArtStudio: " ArtStudioDir)
  58.      )
  59. )
  60.  
  61. ;=============================================================================
  62. ; German strings
  63.  
  64. (if   (= @language "deutsch")
  65. (
  66.  (set default_lang 2)
  67.  
  68.  (set #bad-kick "ArtStudio benötigt mindestens Amiga-OS 3.0 oder höher")
  69.  
  70.  (set SelectDir1Msg
  71.       (cat "Wählen Sie ein Verzeichnis, wo Sie ArtStudio "
  72.            "installieren möchten. Ein Verzeichnis mit den "
  73.            "Namen ArtStudio wird automatisch angelegt!"
  74.       )
  75.  )
  76.  
  77.  (Set ProgMsg
  78.       (cat "\nWelche Dateien sollen installiert werden?\n"
  79.       )
  80.  )
  81.  
  82.  (set Choice1Msg "ArtStudio Hauptprogramm (ca. 2MB)")
  83.  (set Choice2Msg "ArtStudio Anleitung (ca. 2MB)")
  84.  (set Choice3Msg "ArtStudio Tools (ca. 2.6MB)")
  85.  (set Choice4Msg "ArtStudio Web Grafiken (ca. 1.2MB)")
  86.  (set Choice5Msg "ArtStudio Einstellungen (ca. 35KB")
  87.  
  88.  (set FPU1Msg "Keine vorhanden")
  89.  (set FPU2Msg "ja, FPU vorhanden")
  90.  
  91.  (set CPU1Msg "MC68000")
  92.  (set CPU2Msg "MC68030")
  93.  (set CPU3Msg "MC68040")
  94.  (set CPU4Msg "MC68060")
  95.  (set CPU5Msg "PPC603/604")
  96.  
  97.  (set CPUMsg "Welchen Prozessor besitzt der Computer, auf dem Sie ArtStudioPro installieren möchten?")
  98.  
  99.  (set UpDateasyn "Prüfe und Erneuere die asyncio.library, wenn nötig...")
  100.  (set UpDatempeg "Prüfe und Erneuere die cgxmpeg.library, wenn nötig...")
  101.  (set UpDategarb "Prüfe und Erneuere die garbagecollector.library, wenn nötig...")
  102.  (set UpDategraf "Prüfe und Erneuere die graffiti.library, wenn nötig...")
  103.  
  104.  (set InstallArtStudioProg "Installiere ArtStudio Version 2.0 Hauptprogramm...")
  105.  (set InstallLoader "Installiere Lademodule...")
  106.  (set InstallSaver "Installiere Speichermodule...")
  107.  (set InstallOperator "Installiere Bildbearbeitungsmodule...")
  108.  (set InstallViewer "Installiere Anzeigemodule...")
  109.  (set InstallARexx "Installiere ARexx Programme...")
  110.  (set InstallGuide "Installiere Guide-Datei...")
  111.  (set InstallCatalog "Installiere Sprachkataloge...")
  112.  (set InstallTools "Installiere Werkzeuge...")
  113.  
  114.  (set AssignAdd1
  115.       (cat "\nFüge ArtStudio Zuweisung an s:user-startup - Es würde wie folgt Aussehen:\n\n%s\n\n"
  116.            (cat "assign ArtStudio: " ArtStudioDir)
  117.       )
  118.  )
  119. )
  120. )
  121.  
  122. (if (> (* 39 65536) (getversion "exec.library" (resident)))
  123.         (abort #bak-kick)
  124. )
  125.  
  126.  
  127. (welcome)
  128. (set old_level @user-level)
  129.  
  130. (user 2)
  131.  
  132. (if ( < (exists "ArtStudio:" (noreq)) 2)
  133.   (
  134.    (set target (askdir
  135.           (prompt SelectDir1Msg)
  136.           (help #which-dir-help)
  137.           (default "SYS:")
  138.    ))
  139.    (set ArtStudioDir        (tackon target "ArtStudio"))
  140.   )
  141. )
  142.  
  143. (if (exists "ArtStudio:" (noreq))
  144.   (
  145.    (set target "ArtStudio:")
  146.    (set ArtStudioDir "ArtStudio:")
  147.   )
  148. )
  149.  
  150. (user old_level)
  151.  
  152. (set WAS
  153.       (askoptions
  154.       (prompt ProgMsg)
  155.       (help   @askchoice-help)
  156.       (choices Choice1Msg Choice2Msg Choice3Msg Choice4Msg Choice5Msg)
  157.       (default 31)
  158.       )
  159. )
  160.  
  161. (set MainDirPPC        (tackon ArtStudioDir "MainPPC"))
  162. (set LoaderDir        (tackon ArtStudioDir "Loader"))
  163. (set LoaderDirPPC    (tackon ArtStudioDir "LoaderPPC"))
  164. (set OperatorDir    (tackon ArtStudioDir "Operator"))
  165. (set OperatorDirPPC    (tackon ArtStudioDir "OperatorPPC"))
  166. (set ViewerDir        (tackon ArtStudioDir "Viewer"))
  167. (set SaverDir        (tackon ArtStudioDir "Saver"))
  168. (set RexxDir        (tackon ArtStudioDir "Rexx"))
  169. (set ToolsDir        (tackon ArtStudioDir "Tools"))
  170. (set DocDir        (tackon ArtStudioDir "Docs"))
  171.  
  172. (If (IN WAS 0)
  173.  (
  174.   (set CPU
  175.       (askchoice
  176.       (prompt CPUMsg)
  177.       (help   @askchoice-help)
  178.       (choices CPU1Msg CPU2Msg CPU3Msg CPU4Msg CPU5Msg)
  179.       (default 1)
  180.       )
  181.   )
  182.  
  183.   (set FPU
  184.       (askchoice
  185.       (prompt FPUMsg)
  186.       (help   @askchoice-help)
  187.       (choices FPU1Msg FPU2Msg)
  188.       (default 1)
  189.       )
  190.   )
  191.  
  192.   (if ( < (exists ArtStudioDir (noreq) ) 2)
  193.     (makedir ArtStudioDir
  194.         (prompt "Creating ArtStudio directory...")
  195.         (help @makedir-help)
  196.         (infos)
  197.     )
  198.   )
  199.  
  200.   (complete 10)
  201.  
  202.   (if ( < (exists LoaderDir (noreq) ) 2)
  203.     (makedir LoaderDir
  204.         (prompt "Creating Loader directory...")
  205. ;        (help @makedir-help)
  206.     )
  207.   )
  208.  
  209.   (complete 11)
  210.  
  211.   (if ( < (exists ViewerDir (noreq) ) 2)
  212.     (makedir ViewerDir
  213.         (prompt "Creating Viewer directory...")
  214. ;        (help @makedir-help)
  215.     )
  216.   )
  217.  
  218.   (complete 12)
  219.  
  220.   (if ( < (exists RexxDir (noreq) ) 2)
  221.     (makedir RexxDir
  222.         (prompt "Creating Rexx directory...")
  223. ;        (help @makedir-help)
  224.     )
  225.   )
  226.  
  227.   (complete 13)
  228.  
  229.   (if ( < (exists SaverDir (noreq) ) 2)
  230.     (makedir SaverDir
  231.         (prompt "Creating Saver directory...")
  232. ;        (help @makedir-help)
  233.     )
  234.   )
  235.  
  236.   (complete 15)
  237.  
  238.   (if ( < (exists ToolsDir (noreq) ) 2)
  239.     (makedir ToolsDir
  240.         (prompt "Creating Tools directory...")
  241. ;        (help @makedir-help)
  242.     )
  243.   )
  244.  
  245.   (complete 16)
  246.  
  247.   (if ( < (exists OperatorDir (noreq) ) 2)
  248.     (makedir OperatorDir
  249.         (prompt "Creating Operator directory...")
  250. ;        (help @makedir-help)
  251.     )
  252.   )
  253.  
  254.  
  255.   (complete 20)
  256.  
  257.   (copyfiles
  258.     (prompt "Copy ArtStudioPro...")
  259.     (help @copyfiles-help)
  260.     (source "ArtStudioPro")
  261.     (dest "ram:")
  262.     (confirm)
  263.   )
  264.  
  265.   (complete 25)
  266.  
  267.   (run "c/Registration"
  268.      (prompt "ArtStudio registration...")
  269.      (help "Keine Hilfe verfügbar.")
  270.   )
  271.  
  272.   (complete 30)
  273.  
  274.   (copyfiles
  275.     (prompt "Installing ArtStudio professional main program...")
  276.     (help @copyfiles-help)
  277.     (source "ram:ArtStudioPro")
  278.     (dest ArtStudioDir)
  279.     (confirm)
  280.   )
  281.  
  282.   (complete 35)
  283.  
  284.   (run "c/delete ram:ArtStudioPro"
  285.        (prompt "Delete ram:ArtStudioPro...")
  286.        (help "Keine Hilfe verfügbar.")
  287.   )
  288.  
  289.   (complete 37)
  290.  
  291.   (copyfiles
  292.     (prompt "Installing ArtStudio Icon...")
  293.     (help @copyfiles-help)
  294.     (source "ArtStudioPro.info")
  295.     (dest ArtStudioDir)
  296.     (confirm)
  297.   )
  298.  
  299.   (complete 38)
  300.  
  301. (If (= CPU 0)
  302.  (
  303.   (copyfiles
  304.     (prompt "Installing Operator files...")
  305.     (help @copyfiles-help)
  306.     (source "Operator68k/")
  307.     (dest OperatorDir)
  308.     (all)
  309.     (confirm)
  310.   )
  311.  
  312.   (copyfiles
  313.     (prompt "Installing loader...")
  314.     (help @copyfiles-help)
  315.     (source "Loader68000/")
  316.     (dest LoaderDir)
  317.     (all)
  318.     (confirm)
  319.   )
  320.  )
  321. )
  322.  
  323. (If (= CPU 1)
  324.  (
  325.   (copyfiles
  326.     (prompt "Installing Operator files...")
  327.     (help @copyfiles-help)
  328.     (source "Operator68k/")
  329.     (dest OperatorDir)
  330.     (all)
  331.     (confirm)
  332.   )
  333.  
  334.   (copyfiles
  335.     (prompt "Installing loader...")
  336.     (help @copyfiles-help)
  337.     (source "Loader68030/")
  338.     (dest LoaderDir)
  339.     (all)
  340.     (confirm)
  341.   )
  342.  )
  343. )
  344.  
  345. (If (= CPU 2)
  346.  (
  347.   (copyfiles
  348.     (prompt "Installing Operator files...")
  349.     (help @copyfiles-help)
  350.     (source "Operator68k/")
  351.     (dest OperatorDir)
  352.     (all)
  353.     (confirm)
  354.   )
  355.   (copyfiles
  356.     (prompt "Installing loader...")
  357.     (help @copyfiles-help)
  358.     (source "Loader68040/")
  359.     (dest LoaderDir)
  360.     (all)
  361.     (confirm)
  362.   )
  363.  )
  364. )
  365.  
  366. (If (= CPU 3)
  367.  (
  368.   (copyfiles
  369.     (prompt "Installing Operator files...")
  370.     (help @copyfiles-help)
  371.     (source "Operator68k/")
  372.     (dest OperatorDir)
  373.     (all)
  374.     (confirm)
  375.   )
  376.  
  377.   (copyfiles
  378.     (prompt "Installing loader...")
  379.     (help @copyfiles-help)
  380.     (source "Loader68060/")
  381.     (dest LoaderDir)
  382.     (all)
  383.     (confirm)
  384.   )
  385.  )
  386. )
  387.  
  388. (If (= CPU 4)
  389.  (
  390.  
  391.   (complete 40)
  392.  
  393.   (if ( < (exists OperatorDirPPC (noreq) ) 2)
  394.     (makedir OperatorDirPPC
  395.         (prompt "Creating OperatorPPC directory...")
  396. ;        (help @makedir-help)
  397.     )
  398.   )
  399.   (complete 41)
  400.  
  401.   (if ( < (exists LoaderDirPPC (noreq) ) 2)
  402.     (makedir LoaderDirPPC
  403.         (prompt "Creating LoaderPPC directory...")
  404. ;        (help @makedir-help)
  405.     )
  406.   )
  407.   (complete 42)
  408.  
  409.   (if ( < (exists MainDirPPC (noreq) ) 2)
  410.     (makedir MainDirPPC
  411.         (prompt "Creating MainPPC directory...")
  412. ;        (help @makedir-help)
  413.     )
  414.   )
  415.  
  416.   (copyfiles
  417.     (prompt "Installing loader...")
  418.     (help @copyfiles-help)
  419.     (source "Loader604/")
  420.     (dest LoaderDir)
  421.     (all)
  422.     (confirm)
  423.   )
  424.  
  425.   (copyfiles
  426.     (prompt "Installing loaderppc...")
  427.     (help @copyfiles-help)
  428.     (source "LoaderPPC/")
  429.     (dest LoaderDirPPC)
  430.     (all)
  431.     (confirm)
  432.   )
  433.  
  434.   (copyfiles
  435.     (prompt "Installing Operator files...")
  436.     (help @copyfiles-help)
  437.     (source "Operator604/")
  438.     (dest OperatorDir)
  439.     (all)
  440.     (confirm)
  441.   )
  442.  
  443.   (copyfiles
  444.     (prompt "Installing operatorppc...")
  445.     (help @copyfiles-help)
  446.     (source "OperatorPPC/")
  447.     (dest OperatorDirPPC)
  448.     (all)
  449.     (confirm)
  450.   )
  451.   (copyfiles
  452.     (prompt "Installing mainppc...")
  453.     (help @copyfiles-help)
  454.     (source "MainPPC/")
  455.     (dest MainDirPPC)
  456.     (all)
  457.     (confirm)
  458.   )
  459.  
  460.  )
  461. )
  462.  
  463.   (complete 43)
  464.  
  465.   (copyfiles
  466.     (prompt "Installing saver...")
  467.     (help @copyfiles-help)
  468.     (source "Saver/")
  469.     (dest SaverDir)
  470.     (all)
  471.     (confirm)
  472.   )
  473.  
  474. (IF (= FPU 1)
  475.  (
  476.   (complete 45)
  477.  
  478.   (copyfiles
  479.     (prompt "Installing OperatorFPU files...")
  480.     (help @copyfiles-help)
  481.     (source "OperatorFPU/")
  482.     (dest OperatorDir)
  483.     (all)
  484.     (confirm)
  485.   )
  486.  )
  487. )
  488.  
  489.   (complete 50)
  490.  
  491.   (copyfiles
  492.     (prompt "Installing viewers...")
  493.     (help @copyfiles-help)
  494.     (source "Viewer/")
  495.     (dest ViewerDir)
  496.     (all)
  497.     (confirm)
  498.   )
  499.  
  500.   (complete 55)
  501.  
  502.   (copyfiles
  503.     (prompt "Installing ARexx files...")
  504.     (help @copyfiles-help)
  505.     (source "Rexx/")
  506.     (dest RexxDir)
  507.     (all)
  508.     (confirm)
  509.   )
  510.  
  511.   (complete 60)
  512.  
  513.   (copyfiles
  514.     (prompt "Installing DataTypes-Classes files...")
  515.     (help @copyfiles-help)
  516.     (source "Classes/")
  517.     (dest "Sys:Classes/")
  518.     (all)
  519.     (confirm)
  520.   )
  521.  
  522.   (complete 62)
  523.  
  524.   (copyfiles
  525.     (prompt "Installing DataTypes-Devs files...")
  526.     (help @copyfiles-help)
  527.     (source "Devs/")
  528.     (dest "Sys:Devs/")
  529.     (all)
  530.     (confirm)
  531.   )
  532.  
  533.   (complete 65)
  534.  
  535.   (copyfiles
  536.     (prompt "Installing Catalogs files...")
  537.     (help @copyfiles-help)
  538.     (source "Catalogs/")
  539.     (dest "Sys:Locale/Catalogs/")
  540.     (all)
  541.     (confirm)
  542.   )
  543.  
  544.   (complete 68)
  545.  
  546.   (startup "ArtStudio"
  547.     (prompt ("\nAdding the ArtStudio assignment to s:user-startup - it currently looks like this:\n\n%s\n\n" (cat "assign ArtStudio: " ArtStudioDir) ) )
  548.     (help @startup-help)
  549.     (command (cat "assign ArtStudio: " ArtStudioDir))
  550.   )
  551.  
  552.  )
  553. )
  554.  
  555.   (complete 70)
  556.  
  557. (If (IN WAS 1)
  558.  (
  559.  
  560.   (copyfiles
  561.     (prompt "Installing Tools...")
  562.     (help @copyfiles-help)
  563.     (source "Tools/")
  564.     (dest ToolsDir)
  565.         (all)
  566.         (infos)
  567.     (confirm)
  568.   )
  569.  
  570.  )
  571. )
  572.  
  573. (If (IN WAS 2)
  574.  (
  575.  
  576.   (complete 75)
  577.  
  578.   (if (= default_lang 4)
  579.   (
  580.       (copyfiles
  581.           (prompt "Copying instruction...")
  582.           (help @copyfiles-help)
  583.           (source "Docs/Instruction/")
  584.           (dest DocDir)
  585.           (infos)
  586.           (all)
  587.           (confirm)
  588.       )
  589.  
  590.   ))
  591.  
  592.   (if (= default_lang 2)
  593.    (
  594.       (copyfiles
  595.           (prompt "Kopiere Anleitung...")
  596.           (help @copyfiles-help)
  597.           (source "Docs/Anleitung/" )
  598.           (dest DocDir)
  599.           (infos)
  600.           (all)
  601.           (confirm)
  602.       )
  603.    )
  604.   )
  605.  )
  606. )
  607.  
  608. (If (IN WAS 5)
  609.  (
  610.  
  611.   (complete 88)
  612.  
  613.   (copyfiles
  614.     (prompt ArtStudioPrefs)
  615.     (help @copyfiles-help)
  616.     (source "s/")
  617.     (dest "s:")
  618.     (all)
  619.     (confirm)
  620.   )
  621.  )
  622. )
  623.  
  624. (complete 90)
  625.  
  626. (copylib
  627.     (prompt UpDateasyn)
  628.     (help @copylib-help)
  629.     (source "libs/asyncio.library")
  630.     (dest "libs:")
  631.     (confirm)
  632. )
  633.  
  634. (complete 93)
  635.  
  636. (copylib
  637.     (prompt UpDatempeg)
  638.     (help @copylib-help)
  639.     (source "libs/cgxmpeg.library")
  640.     (dest "libs:")
  641.     (confirm)
  642. )
  643.  
  644. (complete 96)
  645.  
  646. (copylib
  647.     (prompt UpDategarb)
  648.     (help @copylib-help)
  649.     (source "libs/garbagecollector.library")
  650.     (dest "libs:")
  651.     (confirm)
  652. )
  653.  
  654. (complete 98)
  655.  
  656. (copylib
  657.     (prompt UpDategraf)
  658.     (help @copylib-help)
  659.     (source "libs/graffiti.library")
  660.     (dest "libs:")
  661.     (confirm)
  662. )
  663.  
  664. (run "c/assign ArtStudio: " ArtStudioDir
  665.      (prompt "Assign ArtStudio...")
  666.      (help "Keine Hilfe verfügbar.")
  667. )
  668.  
  669. (complete 100)
  670.